﻿Public Class Empresa
    Private CIA_Codigo As String
    Private CIA_Ruc As String
    Private CIA_Descripcion As String
    Private CIA_Carpeta As String

    Public Sub New()
    End Sub

    Public Property gCIA_Codigo() As String
        Get
            Return CIA_Codigo
        End Get
        Set(ByVal value As String)
            CIA_Codigo = value
        End Set
    End Property

    Public Property gCIA_Ruc() As String
        Get
            Return CIA_Ruc
        End Get
        Set(ByVal value As String)
            CIA_Ruc = value
        End Set
    End Property

    Public Property gCIA_Descripcion() As String
        Get
            Return CIA_Descripcion
        End Get
        Set(ByVal value As String)
            CIA_Descripcion = value
        End Set
    End Property

    Public Property gCIA_Carpeta() As String
        Get
            Return CIA_Carpeta
        End Get
        Set(ByVal value As String)
            CIA_Carpeta = value
        End Set
    End Property

    Public Sub New(ByVal CIA_Codigo As String, ByVal CIA_Ruc As String, ByVal CIA_Descripcion As String, ByVal CIA_Carpeta As String)
        gCIA_Codigo = CIA_Codigo
        gCIA_Ruc = CIA_Ruc
        gCIA_Descripcion = CIA_Descripcion
        gCIA_Carpeta = CIA_Carpeta
    End Sub
End Class
